home *** CD-ROM | disk | FTP | other *** search
/ Acorn RISC PD-CD 1 / Acorn RISC PD-CD 1.iso / utilities / _customise / clocks / _clock / _runimage < prev    next >
Unknown  |  1992-05-07  |  10.2 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% xdgMime image/x-tga default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 18 f4 20 3e 20 | 21 63 6c 6f 63 6b 2e 21 |..... > |!clock.!|
|00000010| 52 75 6e 49 6d 61 67 65 | 0d 00 14 05 f4 0d 00 1e |RunImage|........|
|00000020| 30 f4 20 42 79 20 4d 65 | 72 6c 79 6e 20 4b 6c 69 |0. By Me|rlyn Kli|
|00000030| 6e 65 20 32 39 2f 35 2f | 38 38 20 28 4d 69 6e 65 |ne 29/5/|88 (Mine|
|00000040| 72 76 61 20 53 6f 66 74 | 77 61 72 65 29 0d 00 28 |rva Soft|ware)..(|
|00000050| 35 f4 20 4d 6f 64 69 66 | 69 65 64 20 62 79 20 50 |5. Modif|ied by P|
|00000060| 68 69 6c 69 70 20 43 6f | 6c 6d 65 72 20 28 41 63 |hilip Co|lmer (Ac|
|00000070| 6f 72 6e 20 43 6f 6d 70 | 75 74 65 72 73 20 4c 74 |orn Comp|uters Lt|
|00000080| 64 29 0d 00 32 38 f4 20 | 4d 6f 64 69 66 69 65 64 |d)..28. |Modified|
|00000090| 20 62 79 20 52 6f 67 65 | 72 20 41 74 74 72 69 6c | by Roge|r Attril|
|000000a0| 6c 20 28 4e 45 31 20 26 | 20 4e 4f 31 20 4c 74 64 |l (NE1 &| NO1 Ltd|
|000000b0| 29 20 31 31 2f 31 31 2f | 39 30 0d 00 3c 05 f4 0d |) 11/11/|90..<...|
|000000c0| 00 46 2a f4 20 54 68 69 | 73 20 70 72 6f 67 72 61 |.F*. Thi|s progra|
|000000d0| 6d 20 69 73 20 69 6e 20 | 74 68 65 20 70 75 62 6c |m is in |the publ|
|000000e0| 69 63 20 64 6f 6d 61 69 | 6e 0d 00 50 05 f4 0d 00 |ic domai|n..P....|
|000000f0| 5a 04 0d 00 64 0e f2 69 | 6e 69 74 63 6c 6f 63 6b |Z...d..i|nitclock|
|00000100| 0d 00 6e 1e ee 85 3a f2 | 65 72 72 6f 72 62 6f 78 |..n...:.|errorbox|
|00000110| 3a c8 99 20 43 72 4d 65 | 6e 75 2c 2c 2d 31 0d 00 |:.. CrMe|nu,,-1..|
|00000120| 78 2a c8 99 20 44 72 61 | 67 2c 2c 2d 31 3a f2 67 |x*.. Dra|g,,-1:.g|
|00000130| 65 74 70 6f 69 6e 74 65 | 72 3a f2 70 6f 70 75 70 |etpointe|r:.popup|
|00000140| 28 63 6c 6f 63 6b 25 29 | 0d 00 82 21 c8 99 20 54 |(clock%)|...!.. T|
|00000150| 69 6d 65 25 20 b8 20 74 | 69 6d 65 78 25 3a 74 69 |ime% . t|imex%:ti|
|00000160| 6d 65 78 25 2b 3d 31 30 | 30 0d 00 8c 04 0d 00 96 |mex%+=10|0.......|
|00000170| 05 f5 0d 00 a0 2b c8 99 | 20 50 6f 6c 6c 25 2c 30 |.....+..| Poll%,0|
|00000180| 2c 71 25 2c 74 69 6d 65 | 78 25 20 b8 20 41 25 3b |,q%,time|x% . A%;|
|00000190| 46 25 3a e7 46 25 80 31 | 20 f2 64 69 65 0d 00 aa |F%:.F%.1| .die...|
|000001a0| 0b c8 8e 20 41 25 20 ca | 0d 00 b4 0f c9 20 30 20 |... A% .|..... 0 |
|000001b0| 3a f2 6e 75 64 67 65 0d | 00 be 1c c9 20 31 20 3a |:.nudge.|.... 1 :|
|000001c0| f2 72 65 64 72 61 77 5f | 77 69 6e 64 6f 77 28 21 |.redraw_|window(!|
|000001d0| 71 25 29 0d 00 c8 42 c9 | 20 32 20 3a f2 6f 70 65 |q%)...B.| 2 :.ope|
|000001e0| 6e 5f 77 69 6e 64 6f 77 | 28 21 71 25 2c 71 25 21 |n_window|(!q%,q%!|
|000001f0| 34 2c 71 25 21 38 2c 71 | 25 21 31 32 2c 71 25 21 |4,q%!8,q|%!12,q%!|
|00000200| 31 36 2c 71 25 21 32 30 | 2c 71 25 21 32 34 2c 71 |16,q%!20|,q%!24,q|
|00000210| 25 21 32 38 29 0d 00 d2 | 1b c9 20 33 20 3a f2 63 |%!28)...|.. 3 :.c|
|00000220| 6c 6f 73 65 61 77 69 6e | 64 6f 77 28 21 71 25 29 |loseawin|dow(!q%)|
|00000230| 0d 00 dc 0f c9 20 36 20 | 3a f2 63 6c 69 63 6b 0d |..... 6 |:.click.|
|00000240| 00 e6 18 c9 20 31 37 2c | 31 38 3a f2 72 65 63 65 |.... 17,|18:.rece|
|00000250| 69 76 65 28 71 25 29 0d | 00 f0 05 cb 0d 00 fa 07 |ive(q%).|........|
|00000260| fd 20 a3 0d 01 04 04 0d | 01 0e 0b dd f2 63 6c 69 |. ......|.....cli|
|00000270| 63 6b 0d 01 18 0d c8 8e | 20 71 25 21 38 20 ca 0d |ck......| q%!8 ..|
|00000280| 01 22 1c c9 20 34 3a 41 | 6e 61 25 3d ac 20 41 6e |.".. 4:A|na%=. An|
|00000290| 61 25 3a f2 5f 52 65 6d | 6f 76 65 0d 01 2c 2d e7 |a%:._Rem|ove..,-.|
|000002a0| 20 ac 20 41 6e 61 25 20 | 4c 61 73 74 54 69 6d 65 | . Ana% |LastTime|
|000002b0| 24 3d 22 3b 3b 3b 3b 3b | 3b 3b 3b 22 20 8b 20 21 |$=";;;;;|;;;" . !|
|000002c0| 71 25 3d 71 25 21 31 32 | 0d 01 36 27 c9 20 32 3a |q%=q%!12|..6'. 2:|
|000002d0| 72 76 25 3d 20 ac 20 72 | 76 25 3a 4c 61 73 74 54 |rv%= . r|v%:LastT|
|000002e0| 69 6d 65 24 3d 22 3b 3b | 3b 3b 3b 3b 3b 3b 22 0d |ime$=";;|;;;;;;".|
|000002f0| 01 40 28 c9 20 31 3a 68 | 72 32 34 25 3d ac 20 68 |.@(. 1:h|r24%=. h|
|00000300| 72 32 34 25 3a c0 4c 61 | 73 74 54 69 6d 65 24 2c |r24%:.La|stTime$,|
|00000310| 32 29 3d 22 3b 3b 22 0d | 01 4a 05 cb 0d 01 54 2f |2)=";;".|.J....T/|
|00000320| c8 99 20 22 57 69 6d 70 | 5f 46 6f 72 63 65 52 65 |.. "Wimp|_ForceRe|
|00000330| 64 72 61 77 22 2c 63 6c | 6f 63 6b 25 2c 30 2c 2d |draw",cl|ock%,0,-|
|00000340| 31 30 32 34 2c 32 35 36 | 30 2c 30 0d 01 5e 05 e1 |1024,256|0,0..^..|
|00000350| 0d 01 68 04 0d 01 72 11 | dd f2 72 65 63 65 69 76 |..h...r.|..receiv|
|00000360| 65 28 71 25 29 0d 01 7c | 0e c8 8e 20 71 25 21 31 |e(q%)..||... q%!1|
|00000370| 36 20 ca 0d 01 86 11 c9 | 20 30 3a f2 66 69 6e 69 |6 ......| 0:.fini|
|00000380| 73 68 3a e0 0d 01 90 1d | c9 20 39 2c 26 34 30 30 |sh:.....|. 9,&400|
|00000390| 43 31 3a f2 72 65 73 65 | 74 5f 70 61 6c 65 74 74 |C1:.rese|t_palett|
|000003a0| 65 0d 01 9a 05 cb 0d 01 | a4 05 e1 0d 01 ae 04 0d |e.......|........|
|000003b0| 01 b8 0d dd a4 63 77 69 | 6e 64 6f 77 0d 01 c2 3f |.....cwi|ndow...?|
|000003c0| f3 20 41 24 2c 66 25 2c | 66 63 25 2c 62 63 25 2c |. A$,f%,|fc%,bc%,|
|000003d0| 78 30 25 2c 79 30 25 2c | 78 31 25 2c 79 31 25 2c |x0%,y0%,|x1%,y1%,|
|000003e0| 63 78 30 25 2c 63 79 30 | 25 2c 63 78 31 25 2c 63 |cx0%,cy0|%,cx1%,c|
|000003f0| 79 31 25 2c 6e 69 63 6f | 6e 73 25 0d 01 cc 56 3d |y1%,nico|ns%...V=|
|00000400| a4 63 72 65 61 74 65 5f | 77 69 6e 64 6f 77 28 63 |.create_|window(c|
|00000410| 78 30 25 2c 63 79 30 25 | 2c 63 78 31 25 2c 63 79 |x0%,cy0%|,cx1%,cy|
|00000420| 31 25 2c 30 2c 30 2c 66 | 25 2c 66 63 25 2c 62 63 |1%,0,0,f|%,fc%,bc|
|00000430| 25 2c 78 30 25 2c 79 30 | 25 2c 78 31 25 2c 79 31 |%,x0%,y0|%,x1%,y1|
|00000440| 25 2c 26 32 44 2c 41 24 | 2c 6e 69 63 6f 6e 73 25 |%,&2D,A$|,nicons%|
|00000450| 29 0d 01 d6 1b dd f2 63 | 6c 6f 73 65 61 77 69 6e |)......c|loseawin|
|00000460| 64 6f 77 28 68 61 6e 64 | 6c 65 25 29 0d 01 e0 1a |dow(hand|le%)....|
|00000470| f2 63 6c 6f 73 65 5f 77 | 69 6e 64 6f 77 28 68 61 |.close_w|indow(ha|
|00000480| 6e 64 6c 65 25 29 0d 01 | ea 0d f2 66 69 6e 69 73 |ndle%)..|...finis|
|00000490| 68 3a e0 0d 01 f4 05 e1 | 0d 01 fe 04 0d 02 08 0c |h:......|........|
|000004a0| dd f2 66 69 6e 69 73 68 | 0d 02 12 17 c8 99 20 22 |..finish|...... "|
|000004b0| 57 69 6d 70 5f 43 6c 6f | 73 65 44 6f 77 6e 22 0d |Wimp_Clo|seDown".|
|000004c0| 02 1c 05 e1 0d 02 26 04 | 0d 02 30 6c dd a4 63 72 |......&.|..0l..cr|
|000004d0| 65 61 74 65 5f 77 69 6e | 64 6f 77 28 63 78 30 25 |eate_win|dow(cx0%|
|000004e0| 2c 63 79 30 25 2c 63 78 | 31 25 2c 63 79 31 25 2c |,cy0%,cx|1%,cy1%,|
|000004f0| 73 63 78 25 2c 73 63 79 | 25 2c 66 6c 61 67 73 25 |scx%,scy|%,flags%|
|00000500| 2c 66 63 25 2c 62 63 25 | 2c 73 78 30 25 2c 73 79 |,fc%,bc%|,sx0%,sy|
|00000510| 30 25 2c 73 78 31 25 2c | 73 79 31 25 2c 74 69 74 |0%,sx1%,|sy1%,tit|
|00000520| 6c 65 66 25 2c 74 69 74 | 6c 65 24 2c 6e 69 63 6f |lef%,tit|le$,nico|
|00000530| 6e 73 25 29 0d 02 3a 41 | 21 71 25 3d 63 78 30 25 |ns%)..:A|!q%=cx0%|
|00000540| 3a 71 25 21 34 3d 63 79 | 30 25 3a 71 25 21 38 3d |:q%!4=cy|0%:q%!8=|
|00000550| 63 78 31 25 3a 71 25 21 | 31 32 3d 63 79 31 25 3a |cx1%:q%!|12=cy1%:|
|00000560| 71 25 21 31 36 3d 73 63 | 78 25 3a 71 25 21 32 30 |q%!16=sc|x%:q%!20|
|00000570| 3d 73 63 79 25 0d 02 44 | 19 71 25 21 32 34 3d 2d |=scy%..D|.q%!24=-|
|00000580| 31 3a 71 25 21 32 38 3d | 66 6c 61 67 73 25 0d 02 |1:q%!28=|flags%..|
|00000590| 4e 13 e7 66 63 25 3d 31 | 35 80 62 63 25 3d 31 35 |N..fc%=1|5.bc%=15|
|000005a0| 8c 0d 02 58 29 71 25 3f | 33 32 3d 31 35 3a 71 25 |...X)q%?|32=15:q%|
|000005b0| 3f 33 33 3d 31 35 3a 71 | 25 3f 33 34 3d 66 63 25 |?33=15:q|%?34=fc%|
|000005c0| 3a 71 25 3f 33 35 3d 62 | 63 25 0d 02 62 29 cc 20 |:q%?35=b|c%..b). |
|000005d0| 71 25 3f 33 32 3d 37 3a | 71 25 3f 33 33 3d 32 3a |q%?32=7:|q%?33=2:|
|000005e0| 71 25 3f 33 34 3d 66 63 | 25 3a 71 25 3f 33 35 3d |q%?34=fc|%:q%?35=|
|000005f0| 62 63 25 0d 02 6c 05 cd | 0d 02 76 24 71 25 3f 33 |bc%..l..|..v$q%?3|
|00000600| 36 3d 33 3a 71 25 3f 33 | 37 3d 31 3a 71 25 3f 33 |6=3:q%?3|7=1:q%?3|
|00000610| 38 3d 31 32 3a 71 25 3f | 33 39 3d 30 0d 02 80 2f |8=12:q%?|39=0.../|
|00000620| 71 25 21 34 30 3d 73 78 | 30 25 3a 71 25 21 34 34 |q%!40=sx|0%:q%!44|
|00000630| 3d 73 79 30 25 3a 71 25 | 21 34 38 3d 73 78 31 25 |=sy0%:q%|!48=sx1%|
|00000640| 3a 71 25 21 35 32 3d 73 | 79 31 25 0d 02 8a 11 71 |:q%!52=s|y1%....q|
|00000650| 25 21 35 36 3d 74 69 74 | 6c 65 66 25 0d 02 94 28 |%!56=tit|lef%...(|
|00000660| 71 25 21 36 30 3d 26 33 | 30 30 30 20 20 20 20 20 |q%!60=&3|000 |
|00000670| 20 3a 20 f4 20 77 6f 72 | 6b 20 61 72 65 61 20 66 | : . wor|k area f|
|00000680| 6c 61 67 73 0d 02 9e 21 | 71 25 21 36 34 3d 30 3a |lags...!|q%!64=0:|
|00000690| 71 25 21 36 38 3d 30 20 | 20 3a 20 f4 20 72 65 73 |q%!68=0 | : . res|
|000006a0| 65 72 76 65 64 0d 02 a8 | 18 24 28 71 25 2b 37 32 |erved...|.$(q%+72|
|000006b0| 29 3d c0 74 69 74 6c 65 | 24 2c 31 31 29 0d 02 b2 |)=.title|$,11)...|
|000006c0| 11 71 25 21 38 34 3d 6e | 69 63 6f 6e 73 25 0d 02 |.q%!84=n|icons%..|
|000006d0| bc 29 ea 49 25 2c 78 30 | 25 2c 79 30 25 2c 78 31 |.).I%,x0|%,y0%,x1|
|000006e0| 25 2c 79 31 25 2c 66 25 | 2c 64 61 74 61 24 3a 49 |%,y1%,f%|,data$:I|
|000006f0| 25 3d 71 25 2b 38 38 0d | 02 c6 10 c8 95 20 6e 69 |%=q%+88.|..... ni|
|00000700| 63 6f 6e 73 25 3e 30 0d | 02 d0 26 f3 20 78 30 25 |cons%>0.|..&. x0%|
|00000710| 2c 79 30 25 2c 78 31 25 | 2c 79 31 25 2c 66 25 2c |,y0%,x1%|,y1%,f%,|
|00000720| 66 63 25 2c 62 63 25 2c | 64 61 74 61 24 0d 02 da |fc%,bc%,|data$...|
|00000730| 28 49 25 21 30 3d 78 30 | 25 3a 49 25 21 34 3d 79 |(I%!0=x0|%:I%!4=y|
|00000740| 30 25 3a 49 25 21 38 3d | 78 31 25 3a 49 25 21 31 |0%:I%!8=|x1%:I%!1|
|00000750| 32 3d 79 31 25 0d 02 e4 | 23 e7 20 28 66 25 80 26 |2=y1%...|#. (f%.&|
|00000760| 34 30 29 3d 30 20 8c 20 | 62 63 25 3d 66 63 25 2b |40)=0 . |bc%=fc%+|
|00000770| 28 62 63 25 3c 3c 34 29 | 0d 02 ee 16 49 25 21 31 |(bc%<<4)|....I%!1|
|00000780| 36 3d 66 25 2b 28 62 63 | 25 3c 3c 32 34 29 0d 02 |6=f%+(bc|%<<24)..|
|00000790| f8 0f e7 28 66 25 80 26 | 31 30 30 29 8c 0d 03 02 |...(f%.&|100)....|
|000007a0| 3c f3 20 4c 25 3a 42 25 | 3d a4 62 75 66 66 65 72 |<. L%:B%|=.buffer|
|000007b0| 28 4c 25 29 3a 49 25 21 | 32 30 3d 42 25 3a 24 42 |(L%):I%!|20=B%:$B|
|000007c0| 25 3d 64 61 74 61 24 3a | 49 25 21 32 34 3d 2d 31 |%=data$:|I%!24=-1|
|000007d0| 3a 49 25 21 32 38 3d 4c | 25 0d 03 0c 05 cc 0d 03 |:I%!28=L|%.......|
|000007e0| 16 12 24 28 49 25 2b 32 | 30 29 3d 64 61 74 61 24 |..$(I%+2|0)=data$|
|000007f0| 0d 03 20 05 cd 0d 03 2a | 1e 49 25 3d 49 25 2b 33 |.. ....*|.I%=I%+3|
|00000800| 32 3a 6e 69 63 6f 6e 73 | 25 3d 6e 69 63 6f 6e 73 |2:nicons|%=nicons|
|00000810| 25 2d 31 0d 03 34 05 ce | 0d 03 3e 1c c8 99 20 43 |%-1..4..|..>... C|
|00000820| 72 65 61 74 65 57 2c 2c | 71 25 20 b8 20 68 61 6e |reateW,,|q% . han|
|00000830| 64 6c 65 25 0d 03 48 0c | 3d 68 61 6e 64 6c 65 25 |dle%..H.|=handle%|
|00000840| 0d 03 52 04 0d 03 5c 14 | dd f2 66 72 6f 6e 74 28 |..R...\.|..front(|
|00000850| 68 61 6e 64 6c 65 25 29 | 0d 03 66 11 e7 68 61 6e |handle%)|..f..han|
|00000860| 64 6c 65 25 3d 2d 31 8c | e1 0d 03 70 12 f2 67 65 |dle%=-1.|...p..ge|
|00000870| 74 77 28 68 61 6e 64 6c | 65 25 29 0d 03 7a 36 f2 |tw(handl|e%)..z6.|
|00000880| 6f 70 65 6e 5f 77 69 6e | 64 6f 77 28 68 61 6e 64 |open_win|dow(hand|
|00000890| 6c 65 25 2c 78 30 25 2c | 79 30 25 2c 78 31 25 2c |le%,x0%,|y0%,x1%,|
|000008a0| 79 31 25 2c 73 63 78 25 | 2c 73 63 79 25 2c 2d 31 |y1%,scx%|,scy%,-1|
|000008b0| 29 0d 03 84 05 e1 0d 03 | 8e 04 0d 03 98 14 dd f2 |).......|........|
|000008c0| 70 6f 70 75 70 28 68 61 | 6e 64 6c 65 25 29 0d 03 |popup(ha|ndle%)..|
|000008d0| a2 12 f2 67 65 74 77 28 | 68 61 6e 64 6c 65 25 29 |...getw(|handle%)|
|000008e0| 0d 03 ac 30 78 6f 25 3d | 6d 6f 75 73 65 78 25 2d |...0xo%=|mousex%-|
|000008f0| 28 78 30 25 2b 78 31 25 | 29 2f 32 3a 79 6f 25 3d |(x0%+x1%|)/2:yo%=|
|00000900| 6d 6f 75 73 65 79 25 2d | 28 79 31 25 2b 36 34 29 |mousey%-|(y1%+64)|
|00000910| 0d 03 b6 46 f2 6f 70 65 | 6e 5f 77 69 6e 64 6f 77 |...F.ope|n_window|
|00000920| 28 68 61 6e 64 6c 65 25 | 2c 78 30 25 2b 78 6f 25 |(handle%|,x0%+xo%|
|00000930| 2c 79 30 25 2b 79 6f 25 | 2c 78 31 25 2b 78 6f 25 |,y0%+yo%|,x1%+xo%|
|00000940| 2c 79 31 25 2b 79 6f 25 | 2c 73 63 78 25 2c 73 63 |,y1%+yo%|,scx%,sc|
|00000950| 79 25 2c 2d 31 29 0d 03 | c0 05 e1 0d 03 ca 04 0d |y%,-1)..|........|
|00000960| 03 d4 3d dd f2 6f 70 65 | 6e 5f 77 69 6e 64 6f 77 |..=..ope|n_window|
|00000970| 28 68 61 6e 64 6c 65 25 | 2c 78 30 25 2c 79 30 25 |(handle%|,x0%,y0%|
|00000980| 2c 78 31 25 2c 79 31 25 | 2c 73 63 78 25 2c 73 63 |,x1%,y1%|,scx%,sc|
|00000990| 79 25 2c 62 68 61 6e 64 | 6c 65 25 29 0d 03 de 11 |y%,bhand|le%)....|
|000009a0| e7 68 61 6e 64 6c 65 25 | 3d 2d 31 8c e1 0d 03 e8 |.handle%|=-1.....|
|000009b0| 21 e7 68 61 6e 64 6c 65 | 25 3d 63 6c 6f 63 6b 25 |!.handle|%=clock%|
|000009c0| 3a 73 63 78 25 3d 30 3a | 73 63 79 25 3d 30 0d 03 |:scx%=0:|scy%=0..|
|000009d0| f2 1f 71 25 21 30 3d 68 | 61 6e 64 6c 65 25 3a 71 |..q%!0=h|andle%:q|
|000009e0| 25 21 32 38 3d 62 68 61 | 6e 64 6c 65 25 0d 03 fc |%!28=bha|ndle%...|
|000009f0| 29 71 25 21 34 3d 78 30 | 25 3a 71 25 21 38 3d 79 |)q%!4=x0|%:q%!8=y|
|00000a00| 30 25 3a 71 25 21 31 32 | 3d 78 31 25 3a 71 25 21 |0%:q%!12|=x1%:q%!|
|00000a10| 31 36 3d 79 31 25 0d 04 | 06 19 71 25 21 32 30 3d |16=y1%..|..q%!20=|
|00000a20| 73 63 78 25 3a 71 25 21 | 32 34 3d 73 63 79 25 0d |scx%:q%!|24=scy%.|
|00000a30| 04 10 10 c8 99 20 4f 70 | 65 6e 57 2c 2c 71 25 0d |..... Op|enW,,q%.|
|00000a40| 04 1a 76 e7 68 61 6e 64 | 6c 65 25 3d 63 6c 6f 63 |..v.hand|le%=cloc|
|00000a50| 6b 25 3a f2 63 61 6c 63 | 72 78 79 3a e7 72 25 3c |k%:.calc|rxy:.r%<|
|00000a60| 3e 6c 72 25 84 78 25 3c | 3e 6c 78 25 84 79 25 3c |>lr%.x%<|>lx%.y%<|
|00000a70| 3e 6c 79 25 3a c8 99 20 | 22 57 69 6d 70 5f 46 6f |>ly%:.. |"Wimp_Fo|
|00000a80| 72 63 65 52 65 64 72 61 | 77 22 2c 63 6c 6f 63 6b |rceRedra|w",clock|
|00000a90| 25 2c 30 2c 2d 31 30 32 | 34 2c 32 35 36 30 2c 30 |%,0,-102|4,2560,0|
|00000aa0| 3a 4c 61 73 74 54 69 6d | 65 24 3d 22 3b 3b 3b 3b |:LastTim|e$=";;;;|
|00000ab0| 3b 3b 3b 3b 22 0d 04 24 | 05 e1 0d 04 2e 04 0d 04 |;;;;"..$|........|
|00000ac0| 38 13 dd f2 67 65 74 77 | 28 68 61 6e 64 6c 65 25 |8...getw|(handle%|
|00000ad0| 29 0d 04 42 1b 21 71 25 | 3d 68 61 6e 64 6c 65 25 |)..B.!q%|=handle%|
|00000ae0| 3a c8 99 20 47 65 74 57 | 2c 2c 71 25 0d 04 4c 2b |:.. GetW|,,q%..L+|
|00000af0| f2 69 6e 66 6f 28 71 25 | 2b 34 29 3a 62 68 61 6e |.info(q%|+4):bhan|
|00000b00| 64 6c 65 25 3d 71 25 21 | 32 38 3a 66 6c 61 67 73 |dle%=q%!|28:flags|
|00000b10| 25 3d 71 25 21 33 32 0d | 04 56 05 e1 0d 04 60 04 |%=q%!32.|.V....`.|
|00000b20| 0d 04 6a 0e dd f2 69 6e | 66 6f 28 71 25 29 0d 04 |..j...in|fo(q%)..|
|00000b30| 74 3d 78 30 25 3d 21 71 | 25 3a 79 30 25 3d 71 25 |t=x0%=!q|%:y0%=q%|
|00000b40| 21 34 3a 78 31 25 3d 71 | 25 21 38 3a 79 31 25 3d |!4:x1%=q|%!8:y1%=|
|00000b50| 71 25 21 31 32 3a 73 63 | 78 25 3d 71 25 21 31 36 |q%!12:sc|x%=q%!16|
|00000b60| 3a 73 63 79 25 3d 71 25 | 21 32 30 0d 04 7e 1d 62 |:scy%=q%|!20..~.b|
|00000b70| 78 25 3d 78 30 25 2d 73 | 63 78 25 3a 62 79 25 3d |x%=x0%-s|cx%:by%=|
|00000b80| 79 31 25 2d 73 63 79 25 | 0d 04 88 05 e1 0d 04 92 |y1%-scy%|........|
|00000b90| 04 0d 04 9c 29 dd f2 75 | 70 64 61 74 65 28 68 61 |....)..u|pdate(ha|
|00000ba0| 6e 64 6c 65 25 2c 75 78 | 30 25 2c 75 79 30 25 2c |ndle%,ux|0%,uy0%,|
|00000bb0| 75 78 31 25 2c 75 79 31 | 25 29 0d 04 a6 39 21 71 |ux1%,uy1|%)...9!q|
|00000bc0| 25 3d 68 61 6e 64 6c 65 | 25 3a 71 25 21 34 3d 75 |%=handle|%:q%!4=u|
|00000bd0| 78 30 25 3a 71 25 21 38 | 3d 75 79 30 25 3a 71 25 |x0%:q%!8|=uy0%:q%|
|00000be0| 21 31 32 3d 75 78 31 25 | 3a 71 25 21 31 36 3d 75 |!12=ux1%|:q%!16=u|
|00000bf0| 79 31 25 0d 04 b0 26 c8 | 99 20 55 70 64 61 74 65 |y1%...&.|. Update|
|00000c00| 57 2c 2c 71 25 20 b8 20 | 6d 6f 72 65 25 3a f2 69 |W,,q% . |more%:.i|
|00000c10| 6e 66 6f 28 71 25 2b 34 | 29 0d 04 ba 05 e1 0d 04 |nfo(q%+4|).......|
|00000c20| c4 04 0d 04 ce 1c dd f2 | 72 65 64 72 61 77 5f 77 |........|redraw_w|
|00000c30| 69 6e 64 6f 77 28 68 61 | 6e 64 6c 65 25 29 0d 04 |indow(ha|ndle%)..|
|00000c40| d8 16 e7 20 68 61 6e 64 | 6c 65 25 3d 63 6c 6f 63 |... hand|le%=cloc|
|00000c50| 6b 25 20 8c 0d 04 e2 0f | 21 71 25 3d 68 61 6e 64 |k% .....|!q%=hand|
|00000c60| 6c 65 25 0d 04 ec 1a c8 | 99 20 52 65 64 72 61 77 |le%.....|. Redraw|
|00000c70| 57 2c 2c 71 25 20 b8 20 | 6d 6f 72 65 25 0d 04 f6 |W,,q% . |more%...|
|00000c80| 0f f2 69 6e 66 6f 28 71 | 25 2b 34 29 0d 05 00 0c |..info(q|%+4)....|
|00000c90| c8 95 20 6d 6f 72 65 25 | 0d 05 0a 11 f2 5f 52 65 |.. more%|....._Re|
|00000ca0| 6d 6f 76 65 63 6c 6f 63 | 6b 0d 05 14 10 f2 72 65 |movecloc|k.....re|
|00000cb0| 64 72 61 77 63 6c 6f 63 | 6b 0d 05 1e 19 c8 99 20 |drawcloc|k...... |
|00000cc0| 47 65 74 52 25 2c 30 2c | 71 25 20 b8 20 6d 6f 72 |GetR%,0,|q% . mor|
|00000cd0| 65 25 0d 05 28 05 ce 0d | 05 32 18 6c 72 25 3d 72 |e%..(...|.2.lr%=r|
|00000ce0| 25 3a 6c 78 25 3d 78 25 | 3a 6c 79 25 3d 79 25 0d |%:lx%=x%|:ly%=y%.|
|00000cf0| 05 3c 05 cd 0d 05 46 05 | e1 0d 05 50 04 0d 05 5a |.<....F.|...P...Z|
|00000d00| 0d dd f2 5f 52 65 6d 6f | 76 65 0d 05 64 1a ea 20 |..._Remo|ve..d.. |
|00000d10| 71 25 3a f2 74 69 63 6b | 3a 71 25 3d 62 75 66 66 |q%:.tick|:q%=buff|
|00000d20| 65 72 73 25 0d 05 6e 22 | f2 75 70 64 61 74 65 28 |ers%..n"|.update(|
|00000d30| 63 6c 6f 63 6b 25 2c 30 | 2c 2d 31 30 32 34 2c 32 |clock%,0|,-1024,2|
|00000d40| 35 36 30 2c 30 29 0d 05 | 78 0c c8 95 20 6d 6f 72 |560,0)..|x... mor|
|00000d50| 65 25 0d 05 82 11 f2 5f | 52 65 6d 6f 76 65 63 6c |e%....._|Removecl|
|00000d60| 6f 63 6b 0d 05 8c 19 c8 | 99 20 47 65 74 52 25 2c |ock.....|. GetR%,|
|00000d70| 30 2c 71 25 20 b8 20 6d | 6f 72 65 25 0d 05 96 05 |0,q% . m|ore%....|
|00000d80| ce 0d 05 a0 18 6c 68 25 | 3d 68 25 3a 6c 6d 25 3d |.....lh%|=h%:lm%=|
|00000d90| 6d 25 3a 6c 73 25 3d 73 | 25 0d 05 aa 05 e1 0d 05 |m%:ls%=s|%.......|
|00000da0| b4 04 0d 05 be 0b dd f2 | 6e 75 64 67 65 0d 05 c8 |........|nudge...|
|00000db0| 1a ea 20 71 25 3a f2 74 | 69 63 6b 3a 71 25 3d 62 |.. q%:.t|ick:q%=b|
|00000dc0| 75 66 66 65 72 73 25 0d | 05 d2 22 f2 75 70 64 61 |uffers%.|..".upda|
|00000dd0| 74 65 28 63 6c 6f 63 6b | 25 2c 30 2c 2d 31 30 32 |te(clock|%,0,-102|
|00000de0| 34 2c 32 35 36 30 2c 30 | 29 0d 05 dc 0c c8 95 20 |4,2560,0|)...... |
|00000df0| 6d 6f 72 65 25 0d 05 e6 | 2e f2 75 70 64 61 74 65 |more%...|..update|
|00000e00| 63 6c 6f 63 6b 28 68 25 | 2c 6d 25 2c 73 25 2c 6c |clock(h%|,m%,s%,l|
|00000e10| 72 25 2c 6c 78 25 2b 62 | 78 25 2c 6c 79 25 2b 62 |r%,lx%+b|x%,ly%+b|
|00000e20| 79 25 29 0d 05 f0 19 c8 | 99 20 47 65 74 52 25 2c |y%).....|. GetR%,|
|00000e30| 30 2c 71 25 20 b8 20 6d | 6f 72 65 25 0d 05 fa 05 |0,q% . m|ore%....|
|00000e40| ce 0d 06 04 18 6c 68 25 | 3d 68 25 3a 6c 6d 25 3d |.....lh%|=h%:lm%=|
|00000e50| 6d 25 3a 6c 73 25 3d 73 | 25 0d 06 0e 05 e1 0d 06 |m%:ls%=s|%.......|
|00000e60| 18 04 0d 06 22 0a dd f2 | 74 69 63 6b 0d 06 2c 18 |...."...|tick..,.|
|00000e70| c8 99 20 54 69 6d 65 25 | 20 b8 20 74 69 6d 65 73 |.. Time%| . times|
|00000e80| 6c 69 70 25 0d 06 36 2f | c8 95 74 69 6d 65 73 6c |lip%..6/|..timesl|
|00000e90| 69 70 25 3e 3d 74 69 6d | 65 78 25 3a 74 69 6d 65 |ip%>=tim|ex%:time|
|00000ea0| 78 25 2b 3d 31 30 30 3a | ce 3a f2 72 65 61 64 74 |x%+=100:|.:.readt|
|00000eb0| 69 6d 65 0d 06 40 05 e1 | 0d 06 4a 04 0d 06 54 1b |ime..@..|..J...T.|
|00000ec0| dd f2 63 6c 6f 73 65 5f | 77 69 6e 64 6f 77 28 68 |..close_|window(h|
|00000ed0| 61 6e 64 6c 65 25 29 0d | 06 5e 1d 21 71 25 3d 68 |andle%).|.^.!q%=h|
|00000ee0| 61 6e 64 6c 65 25 3a c8 | 99 20 43 6c 6f 73 65 57 |andle%:.|. CloseW|
|00000ef0| 2c 2c 71 25 0d 06 68 05 | e1 0d 06 72 04 0d 06 7c |,,q%..h.|...r...||
|00000f00| 0a dd f2 76 61 72 73 0d | 06 86 1e 57 69 6d 70 20 |...vars.|...Wimp |
|00000f10| 20 20 20 3d 20 28 31 3c | 3c 31 38 29 20 2b 20 28 | = (1<|<18) + (|
|00000f20| 33 3c 3c 36 29 0d 06 90 | 14 43 72 65 61 74 65 57 |3<<6)...|.CreateW|
|00000f30| 20 3d 20 57 69 6d 70 2b | 31 0d 06 9a 14 4f 70 65 | = Wimp+|1....Ope|
|00000f40| 6e 57 20 20 20 3d 20 57 | 69 6d 70 2b 35 0d 06 a4 |nW = W|imp+5...|
|00000f50| 14 43 6c 6f 73 65 57 20 | 20 3d 20 57 69 6d 70 2b |.CloseW | = Wimp+|
|00000f60| 36 0d 06 ae 14 52 65 64 | 72 61 77 57 20 3d 20 57 |6....Red|rawW = W|
|00000f70| 69 6d 70 2b 38 0d 06 b8 | 14 55 70 64 61 74 65 57 |imp+8...|.UpdateW|
|00000f80| 20 3d 20 57 69 6d 70 2b | 39 0d 06 c2 15 47 65 74 | = Wimp+|9....Get|
|00000f90| 52 25 20 20 20 3d 20 57 | 69 6d 70 2b 31 30 0d 06 |R% = W|imp+10..|
|00000fa0| cc 15 47 65 74 57 20 20 | 20 20 3d 20 57 69 6d 70 |..GetW | = Wimp|
|00000fb0| 2b 31 31 0d 06 d6 15 47 | 65 74 50 20 20 20 20 3d |+11....G|etP =|
|00000fc0| 20 57 69 6d 70 2b 31 35 | 0d 06 e0 15 44 72 61 67 | Wimp+15|....Drag|
|00000fd0| 20 20 20 20 3d 20 57 69 | 6d 70 2b 31 36 0d 06 ea | = Wi|mp+16...|
|00000fe0| 15 43 72 4d 65 6e 75 20 | 20 3d 20 57 69 6d 70 2b |.CrMenu | = Wimp+|
|00000ff0| 32 30 0d 06 f4 15 44 63 | 4d 65 6e 75 20 20 3d 20 |20....Dc|Menu = |
|00001000| 57 69 6d 70 2b 32 31 0d | 06 fe 39 c8 99 20 22 4f |Wimp+21.|..9.. "O|
|00001010| 53 5f 53 57 49 4e 75 6d | 62 65 72 46 72 6f 6d 53 |S_SWINum|berFromS|
|00001020| 74 72 69 6e 67 22 2c 2c | 22 58 57 69 6d 70 5f 50 |tring",,|"XWimp_P|
|00001030| 6f 6c 6c 49 64 6c 65 22 | 20 b8 20 50 6f 6c 6c 25 |ollIdle"| . Poll%|
|00001040| 0d 07 08 3f c8 99 20 22 | 4f 53 5f 53 57 49 4e 75 |...?.. "|OS_SWINu|
|00001050| 6d 62 65 72 46 72 6f 6d | 53 74 72 69 6e 67 22 2c |mberFrom|String",|
|00001060| 2c 22 4f 53 5f 52 65 61 | 64 4d 6f 6e 6f 74 6f 6e |,"OS_Rea|dMonoton|
|00001070| 69 63 54 69 6d 65 22 20 | b8 20 54 69 6d 65 25 0d |icTime" |. Time%.|
|00001080| 07 12 05 e1 0d 07 1c 04 | 0d 07 26 10 dd f2 67 65 |........|..&...ge|
|00001090| 74 70 6f 69 6e 74 65 72 | 0d 07 30 0f c8 99 20 47 |tpointer|..0... G|
|000010a0| 65 74 50 2c 2c 71 25 0d | 07 3a 48 6d 6f 75 73 65 |etP,,q%.|.:Hmouse|
|000010b0| 78 25 3d 21 71 25 3a 6d | 6f 75 73 65 79 25 3d 71 |x%=!q%:m|ousey%=q|
|000010c0| 25 21 34 3a 62 25 3d 71 | 25 21 38 3a 68 61 6e 64 |%!4:b%=q|%!8:hand|
|000010d0| 6c 65 25 3d 71 25 21 31 | 32 3a 69 63 6f 6e 25 3d |le%=q%!1|2:icon%=|
|000010e0| 71 25 21 31 36 3a 6f 62 | 25 3d 71 25 21 32 30 0d |q%!16:ob|%=q%!20.|
|000010f0| 07 44 05 e1 0d 07 4e 04 | 0d 07 58 0e dd f2 65 72 |.D....N.|..X...er|
|00001100| 72 6f 72 62 6f 78 0d 07 | 62 0f c8 99 20 44 72 61 |rorbox..|b... Dra|
|00001110| 67 2c 2c 2d 31 0d 07 6c | 23 21 62 75 66 66 65 72 |g,,-1..l|#!buffer|
|00001120| 73 25 3d 9f 3a 24 28 62 | 75 66 66 65 72 73 25 2b |s%=.:$(b|uffers%+|
|00001130| 34 29 3d f6 24 2b bd 30 | 0d 07 76 2c c8 99 20 22 |4)=.$+.0|..v,.. "|
|00001140| 57 69 6d 70 5f 52 65 70 | 6f 72 74 45 72 72 6f 72 |Wimp_Rep|ortError|
|00001150| 22 2c 62 75 66 66 65 72 | 73 25 2c 31 2c 22 63 6c |",buffer|s%,1,"cl|
|00001160| 6f 63 6b 22 0d 07 80 0d | f2 66 69 6e 69 73 68 3a |ock"....|.finish:|
|00001170| e0 0d 07 8a 05 e1 0d 07 | 94 04 0d 07 9e 0f dd f2 |........|........|
|00001180| 69 6e 69 74 63 6c 6f 63 | 6b 0d 07 a8 10 ee 85 3a |initcloc|k......:|
|00001190| f2 66 69 6e 69 73 68 3a | e0 0d 07 b2 09 f2 76 61 |.finish:|......va|
|000011a0| 72 73 0d 07 bc 0a 41 6e | 61 25 3d b9 0d 07 c6 0b |rs....An|a%=.....|
|000011b0| 68 72 32 34 25 3d a3 0d | 07 d0 09 72 76 25 3d a3 |hr24%=..|...rv%=.|
|000011c0| 0d 07 da 12 de 20 44 69 | 67 43 6f 64 65 25 28 31 |..... Di|gCode%(1|
|000011d0| 31 29 0d 07 e4 04 0d 07 | ee 18 44 69 67 43 6f 64 |1)......|..DigCod|
|000011e0| 65 25 28 30 29 3d 25 31 | 31 31 30 31 31 31 0d 07 |e%(0)=%1|110111..|
|000011f0| f8 18 44 69 67 43 6f 64 | 65 25 28 31 29 3d 25 30 |..DigCod|e%(1)=%0|
|00001200| 31 30 30 31 30 30 0d 08 | 02 18 44 69 67 43 6f 64 |100100..|..DigCod|
|00001210| 65 25 28 32 29 3d 25 31 | 30 31 31 31 30 31 0d 08 |e%(2)=%1|011101..|
|00001220| 0c 18 44 69 67 43 6f 64 | 65 25 28 33 29 3d 25 31 |..DigCod|e%(3)=%1|
|00001230| 31 30 31 31 30 31 0d 08 | 16 18 44 69 67 43 6f 64 |101101..|..DigCod|
|00001240| 65 25 28 34 29 3d 25 30 | 31 30 31 31 31 30 0d 08 |e%(4)=%0|101110..|
|00001250| 20 18 44 69 67 43 6f 64 | 65 25 28 35 29 3d 25 31 | .DigCod|e%(5)=%1|
|00001260| 31 30 31 30 31 31 0d 08 | 2a 18 44 69 67 43 6f 64 |101011..|*.DigCod|
|00001270| 65 25 28 36 29 3d 25 31 | 31 31 31 30 31 30 0d 08 |e%(6)=%1|111010..|
|00001280| 34 18 44 69 67 43 6f 64 | 65 25 28 37 29 3d 25 30 |4.DigCod|e%(7)=%0|
|00001290| 31 30 30 31 30 31 0d 08 | 3e 18 44 69 67 43 6f 64 |100101..|>.DigCod|
|000012a0| 65 25 28 38 29 3d 25 31 | 31 31 31 31 31 31 0d 08 |e%(8)=%1|111111..|
|000012b0| 48 18 44 69 67 43 6f 64 | 65 25 28 39 29 3d 25 30 |H.DigCod|e%(9)=%0|
|000012c0| 31 30 31 31 31 31 0d 08 | 52 1a 44 69 67 43 6f 64 |101111..|R.DigCod|
|000012d0| 65 25 28 31 30 29 3d 25 | 31 30 30 30 30 30 30 30 |e%(10)=%|10000000|
|000012e0| 0d 08 5c 19 44 69 67 43 | 6f 64 65 25 28 31 31 29 |..\.DigC|ode%(11)|
|000012f0| 3d 25 30 30 30 30 30 30 | 30 0d 08 66 18 4c 61 73 |=%000000|0..f.Las|
|00001300| 74 54 69 6d 65 24 3d 22 | 3b 3b 3b 3b 3b 3b 3b 3b |tTime$="|;;;;;;;;|
|00001310| 22 0d 08 70 04 0d 08 7a | 0d de 20 74 62 6c 25 20 |"..p...z|.. tbl% |
|00001320| 32 30 0d 08 84 1e de 20 | 74 61 73 6b 69 64 25 34 |20..... |taskid%4|
|00001330| 3a 24 74 61 73 6b 69 64 | 25 3d 22 54 41 53 4b 22 |:$taskid|%="TASK"|
|00001340| 0d 08 8e 38 c8 99 20 22 | 57 69 6d 70 5f 49 6e 69 |...8.. "|Wimp_Ini|
|00001350| 74 69 61 6c 69 73 65 22 | 2c 32 30 30 2c 21 74 61 |tialise"|,200,!ta|
|00001360| 73 6b 69 64 25 2c 22 43 | 6c 6f 63 6b 22 20 b8 20 |skid%,"C|lock" . |
|00001370| 76 65 72 73 69 6f 6e 25 | 0d 08 98 25 de 20 71 25 |version%|...%. q%|
|00001380| 20 32 35 36 2c 62 75 66 | 66 65 72 73 25 20 35 31 | 256,buf|fers% 51|
|00001390| 32 2c 70 61 6c 65 74 74 | 65 25 20 38 30 0d 08 a2 |2,palett|e% 80...|
|000013a0| 17 f7 2b 31 3a 63 6c 6f | 63 6b 25 3d a4 63 77 69 |..+1:clo|ck%=.cwi|
|000013b0| 6e 64 6f 77 0d 08 ac 36 | dc 20 43 6c 6f 63 6b 2c |ndow...6|. Clock,|
|000013c0| 26 42 46 30 30 30 30 30 | 33 2c 37 2c 30 2c 30 2c |&BF00000|3,7,0,0,|
|000013d0| 2d 39 38 30 2c 32 35 36 | 30 2c 30 2c 30 2c 2d 34 |-980,256|0,0,0,-4|
|000013e0| 30 30 2c 34 30 30 2c 30 | 2c 30 0d 08 b6 1f f4 20 |00,400,0|,0..... |
|000013f0| 77 61 73 20 2d 31 30 32 | 34 20 69 6e 73 74 65 61 |was -102|4 instea|
|00001400| 64 20 6f 66 20 2d 39 38 | 30 0d 08 c0 1e f4 20 77 |d of -98|0..... w|
|00001410| 61 73 20 31 32 38 30 20 | 69 6e 73 74 65 61 64 20 |as 1280 |instead |
|00001420| 6f 66 20 32 35 36 30 0d | 08 ca 14 de 73 69 6e 28 |of 2560.|....sin(|
|00001430| 35 39 29 2c 63 6f 73 28 | 35 39 29 0d 08 d4 0c e3 |59),cos(|59).....|
|00001440| 49 25 3d 30 b8 35 39 0d | 08 de 14 73 69 6e 28 49 |I%=0.59.|...sin(I|
|00001450| 25 29 3d b5 b2 28 49 25 | 2a 36 29 0d 08 e8 14 63 |%)=..(I%|*6)....c|
|00001460| 6f 73 28 49 25 29 3d 9b | b2 28 49 25 2a 36 29 0d |os(I%)=.|.(I%*6).|
|00001470| 08 f2 05 ed 0d 08 fc 22 | f2 72 65 61 64 74 69 6d |......."|.readtim|
|00001480| 65 3a 6c 68 25 3d 68 25 | 3a 6c 6d 25 3d 6d 25 3a |e:lh%=h%|:lm%=m%:|
|00001490| 6c 73 25 3d 73 25 0d 09 | 06 21 f2 63 61 6c 63 72 |ls%=s%..|.!.calcr|
|000014a0| 78 79 3a 6c 72 25 3d 72 | 25 3a 6c 78 25 3d 78 25 |xy:lr%=r|%:lx%=x%|
|000014b0| 3a 6c 79 25 3d 79 25 0d | 09 10 12 f2 72 65 73 65 |:ly%=y%.|....rese|
|000014c0| 74 5f 70 61 6c 65 74 74 | 65 0d 09 1a 05 e1 0d 09 |t_palett|e.......|
|000014d0| 24 04 0d 09 2e 13 dd f2 | 72 65 73 65 74 5f 70 61 |$.......|reset_pa|
|000014e0| 6c 65 74 74 65 0d 09 38 | 28 c8 99 22 4f 53 5f 52 |lette..8|(.."OS_R|
|000014f0| 65 61 64 4d 6f 64 65 56 | 61 72 69 61 62 6c 65 22 |eadModeV|ariable"|
|00001500| 2c eb 2c 39 20 b8 20 2c | 2c 62 70 70 25 0d 09 42 |,.,9 . ,|,bpp%..B|
|00001510| 22 c8 99 22 57 69 6d 70 | 5f 52 65 61 64 50 61 6c |".."Wimp|_ReadPal|
|00001520| 65 74 74 65 22 2c 2c 70 | 61 6c 65 74 74 65 25 0d |ette",,p|alette%.|
|00001530| 09 4c 15 63 30 25 3d 3f | 70 61 6c 65 74 74 65 25 |.L.c0%=?|palette%|
|00001540| 20 3e 3e 32 0d 09 56 15 | 74 30 25 3d 3f 70 61 6c | >>2..V.|t0%=?pal|
|00001550| 65 74 74 65 25 20 80 20 | 33 0d 09 60 18 4c 61 73 |ette% . |3..`.Las|
|00001560| 74 54 69 6d 65 24 3d 22 | 3b 3b 3b 3b 3b 3b 3b 3b |tTime$="|;;;;;;;;|
|00001570| 22 0d 09 6a 2f c8 99 20 | 22 57 69 6d 70 5f 46 6f |"..j/.. |"Wimp_Fo|
|00001580| 72 63 65 52 65 64 72 61 | 77 22 2c 63 6c 6f 63 6b |rceRedra|w",clock|
|00001590| 25 2c 30 2c 2d 31 30 32 | 34 2c 32 35 36 30 2c 30 |%,0,-102|4,2560,0|
|000015a0| 0d 09 74 05 e1 0d 09 7e | 04 0d 09 88 1e dd f2 63 |..t....~|.......c|
|000015b0| 6c 6f 63 6b 28 48 25 2c | 4d 25 2c 53 25 2c 52 25 |lock(H%,|M%,S%,R%|
|000015c0| 2c 58 25 2c 59 25 29 0d | 09 92 07 ea 54 25 0d 09 |,X%,Y%).|....T%..|
|000015d0| 9c 0c e7 20 41 6e 61 25 | 20 8c 0d 09 a6 0e f2 67 |... Ana%| ......g|
|000015e0| 63 6f 6c 28 30 2c 37 29 | 0d 09 b0 0c e7 52 25 3e |col(0,7)|.....R%>|
|000015f0| 31 35 30 8c 0d 09 ba 13 | 54 25 3d 52 25 2d 28 52 |150.....|T%=R%-(R|
|00001600| 25 3e 3e 35 29 2d 38 0d | 09 c4 0c e3 49 25 3d 30 |%>>5)-8.|....I%=0|
|00001610| b8 35 39 0d 09 ce 21 c8 | 92 58 25 2b 54 25 2a 73 |.59...!.|.X%+T%*s|
|00001620| 69 6e 28 49 25 29 2c 59 | 25 2b 54 25 2a 63 6f 73 |in(I%),Y|%+T%*cos|
|00001630| 28 49 25 29 0d 09 d8 05 | ed 0d 09 e2 05 cd 0d 09 |(I%)....|........|
|00001640| ec 0b e7 52 25 3e 35 30 | 8c 0d 09 f6 0e f2 67 63 |...R%>50|......gc|
|00001650| 6f 6c 28 30 2c 38 29 0d | 0a 00 11 54 25 3d 52 25 |ol(0,8).|...T%=R%|
|00001660| 2d 28 52 25 3e 3e 34 29 | 0d 0a 0a 0e e3 49 25 3d |-(R%>>4)|.....I%=|
|00001670| 30 b8 35 39 88 35 0d 0a | 14 11 54 25 3d 52 25 2d |0.59.5..|..T%=R%-|
|00001680| 28 52 25 3e 3e 34 29 0d | 0a 1e 39 c8 93 c8 90 58 |(R%>>4).|..9....X|
|00001690| 25 2b 54 25 2a 73 69 6e | 28 49 25 29 2d 28 52 25 |%+T%*sin|(I%)-(R%|
|000016a0| 3e 3e 35 29 2c 59 25 2b | 54 25 2a 63 6f 73 28 49 |>>5),Y%+|T%*cos(I|
|000016b0| 25 29 2d 28 52 25 3e 3e | 35 29 2c 52 25 3e 3e 34 |%)-(R%>>|5),R%>>4|
|000016c0| 0d 0a 28 05 ed 0d 0a 32 | 05 cd 0d 0a 3c 0e f2 67 |..(....2|....<..g|
|000016d0| 63 6f 6c 28 30 2c 37 29 | 0d 0a 46 0e c8 8f 58 25 |col(0,7)|..F...X%|
|000016e0| 2c 59 25 2c 52 25 0d 0a | 50 1d f2 68 61 6e 64 73 |,Y%,R%..|P..hands|
|000016f0| 28 48 25 2c 4d 25 2c 53 | 25 2c 52 25 2c 58 25 2c |(H%,M%,S|%,R%,X%,|
|00001700| 59 25 29 0d 0a 5a 05 cc | 0d 0a 64 18 4c 61 73 74 |Y%)..Z..|..d.Last|
|00001710| 54 69 6d 65 24 3d 22 3b | 3b 3b 3b 3b 3b 3b 3b 22 |Time$=";|;;;;;;;"|
|00001720| 0d 0a 6e 35 f4 50 52 4f | 43 5f 54 69 6d 65 28 58 |..n5.PRO|C_Time(X|
|00001730| 25 2d 52 25 2c 59 25 2d | 28 52 25 2f 34 2a 34 2f |%-R%,Y%-|(R%/4*4/|
|00001740| 35 29 2c 52 25 2f 34 2a | 34 2f 35 2c 52 25 2f 32 |5),R%/4*|4/5,R%/2|
|00001750| 2a 34 2f 35 29 0d 0a 78 | 29 f2 5f 54 69 6d 65 28 |*4/5)..x|)._Time(|
|00001760| 58 25 2d 78 72 25 2c 59 | 25 2d 79 72 25 2c 78 72 |X%-xr%,Y|%-yr%,xr|
|00001770| 25 2f 34 2a 34 2f 35 2c | 79 72 25 2a 32 29 0d 0a |%/4*4/5,|yr%*2)..|
|00001780| 82 05 cd 0d 0a 8c 05 e1 | 0d 0a 96 04 0d 0a a0 1e |........|........|
|00001790| dd f2 68 61 6e 64 73 28 | 48 25 2c 4d 25 2c 53 25 |..hands(|H%,M%,S%|
|000017a0| 2c 52 25 2c 58 25 2c 59 | 25 29 0d 0a aa 0e f2 67 |,R%,X%,Y|%).....g|
|000017b0| 63 6f 6c 28 33 2c 33 29 | 0d 0a b4 26 f2 68 61 6e |col(3,3)|...&.han|
|000017c0| 64 28 48 25 2a 35 2b 4d | 25 81 31 32 2c 58 25 2c |d(H%*5+M|%.12,X%,|
|000017d0| 59 25 2c 52 25 2d 28 52 | 25 3e 3e 31 29 29 0d 0a |Y%,R%-(R|%>>1))..|
|000017e0| be 1e f2 68 61 6e 64 28 | 4d 25 2c 58 25 2c 59 25 |...hand(|M%,X%,Y%|
|000017f0| 2c 52 25 2d 28 52 25 3e | 3e 32 29 29 0d 0a c8 0f |,R%-(R%>|>2))....|
|00001800| f2 67 63 6f 6c 28 33 2c | 31 31 29 0d 0a d2 0a ec |.gcol(3,|11).....|
|00001810| 58 25 2c 59 25 0d 0a dc | 2c ec 42 59 28 52 25 3e |X%,Y%...|,.BY(R%>|
|00001820| 3e 34 29 2a 73 69 6e 28 | 53 25 83 36 30 29 2c 28 |>4)*sin(|S%.60),(|
|00001830| 52 25 3e 3e 34 29 2a 63 | 6f 73 28 53 25 83 36 30 |R%>>4)*c|os(S%.60|
|00001840| 29 0d 0a e6 36 df 42 59 | 28 52 25 2d 28 52 25 3e |)...6.BY|(R%-(R%>|
|00001850| 3e 34 29 29 2a 73 69 6e | 28 53 25 83 36 30 29 2c |>4))*sin|(S%.60),|
|00001860| 28 52 25 2d 28 52 25 3e | 3e 34 29 29 2a 63 6f 73 |(R%-(R%>|>4))*cos|
|00001870| 28 53 25 83 36 30 29 0d | 0a f0 0f f2 67 63 6f 6c |(S%.60).|....gcol|
|00001880| 28 30 2c 31 31 29 0d 0a | fa 13 c8 8f c8 90 58 25 |(0,11)..|......X%|
|00001890| 2c 59 25 2c 52 25 3e 3e | 34 0d 0b 04 05 e1 0d 0b |,Y%,R%>>|4.......|
|000018a0| 0e 04 0d 0b 18 04 0d 0b | 22 17 dd f2 68 61 6e 64 |........|"...hand|
|000018b0| 28 41 25 2c 58 25 2c 59 | 25 2c 52 25 29 0d 0b 2c |(A%,X%,Y|%,R%)..,|
|000018c0| 07 ea 54 25 0d 0b 36 15 | 54 25 3d 28 52 25 3e 3e |..T%..6.|T%=(R%>>|
|000018d0| 31 29 2f 63 6f 73 28 31 | 29 0d 0b 40 2e ec 58 25 |1)/cos(1|)..@..X%|
|000018e0| 2b 73 69 6e 28 28 41 25 | 2b 31 29 83 36 30 29 2a |+sin((A%|+1).60)*|
|000018f0| 54 25 2c 59 25 2b 63 6f | 73 28 28 41 25 2b 31 29 |T%,Y%+co|s((A%+1)|
|00001900| 83 36 30 29 2a 54 25 0d | 0b 4a 0a ec 58 25 2c 59 |.60)*T%.|.J..X%,Y|
|00001910| 25 0d 0b 54 38 f0 31 31 | 37 2c 58 25 2b 73 69 6e |%..T8.11|7,X%+sin|
|00001920| 28 28 41 25 2b 36 30 2d | 31 29 83 36 30 29 2a 54 |((A%+60-|1).60)*T|
|00001930| 25 2c 59 25 2b 63 6f 73 | 28 28 41 25 2b 36 30 2d |%,Y%+cos|((A%+60-|
|00001940| 31 29 83 36 30 29 2a 54 | 25 0d 0b 5e 05 e1 0d 0b |1).60)*T|%..^....|
|00001950| 68 04 0d 0b 72 24 dd f2 | 75 70 64 61 74 65 63 6c |h...r$..|updatecl|
|00001960| 6f 63 6b 28 48 25 2c 4d | 25 2c 53 25 2c 52 25 2c |ock(H%,M|%,S%,R%,|
|00001970| 58 25 2c 59 25 29 0d 0b | 7c 0c e7 20 41 6e 61 25 |X%,Y%)..||.. Ana%|
|00001980| 20 8c 0d 0b 86 0d e7 52 | 25 3c 3e 6c 72 25 8c 0d | ......R|%<>lr%..|
|00001990| 0b 90 1e 20 f2 63 6c 6f | 63 6b 28 48 25 2c 4d 25 |... .clo|ck(H%,M%|
|000019a0| 2c 53 25 2c 52 25 2c 58 | 25 2c 59 25 29 0d 0b 9a |,S%,R%,X|%,Y%)...|
|000019b0| 05 cc 0d 0b a4 0f 20 f2 | 67 63 6f 6c 28 33 2c 33 |...... .|gcol(3,3|
|000019c0| 29 0d 0b ae 2b 20 e7 28 | 48 25 3c 3e 6c 68 25 29 |)...+ .(|H%<>lh%)|
|000019d0| 84 28 28 48 25 3d 6c 68 | 25 29 80 28 6c 6d 25 81 |.((H%=lh|%).(lm%.|
|000019e0| 31 32 3c 3e 4d 25 81 31 | 32 29 29 8c 0d 0b b8 2a |12<>M%.1|2))....*|
|000019f0| 20 20 f2 68 61 6e 64 28 | 6c 68 25 2a 35 2b 6c 6d | .hand(|lh%*5+lm|
|00001a00| 25 81 31 32 2c 58 25 2c | 59 25 2c 52 25 2d 28 52 |%.12,X%,|Y%,R%-(R|
|00001a10| 25 3e 3e 31 29 29 0d 0b | c2 06 20 cd 0d 0b cc 29 |%>>1))..|.. ....)|
|00001a20| 20 e7 4d 25 3c 3e 6c 6d | 25 3a f2 68 61 6e 64 28 | .M%<>lm|%:.hand(|
|00001a30| 6c 6d 25 2c 58 25 2c 59 | 25 2c 52 25 2d 28 52 25 |lm%,X%,Y|%,R%-(R%|
|00001a40| 3e 3e 32 29 29 0d 0b d6 | 10 20 f2 67 63 6f 6c 28 |>>2))...|. .gcol(|
|00001a50| 33 2c 31 31 29 0d 0b e0 | 0f 20 e7 53 25 3c 3e 6c |3,11)...|. .S%<>l|
|00001a60| 73 25 20 8c 0d 0b ea 0c | 20 20 ec 58 25 2c 59 25 |s% .....| .X%,Y%|
|00001a70| 0d 0b f4 30 20 20 ec 42 | 59 28 52 25 3e 3e 34 29 |...0 .B|Y(R%>>4)|
|00001a80| 2a 73 69 6e 28 6c 73 25 | 83 36 30 29 2c 28 52 25 |*sin(ls%|.60),(R%|
|00001a90| 3e 3e 34 29 2a 63 6f 73 | 28 6c 73 25 83 36 30 29 |>>4)*cos|(ls%.60)|
|00001aa0| 0d 0b fe 3a 20 20 df 42 | 59 28 52 25 2d 28 52 25 |...: .B|Y(R%-(R%|
|00001ab0| 3e 3e 34 29 29 2a 73 69 | 6e 28 6c 73 25 83 36 30 |>>4))*si|n(ls%.60|
|00001ac0| 29 2c 28 52 25 2d 28 52 | 25 3e 3e 34 29 29 2a 63 |),(R%-(R|%>>4))*c|
|00001ad0| 6f 73 28 6c 73 25 83 36 | 30 29 0d 0c 08 06 20 cd |os(ls%.6|0).... .|
|00001ae0| 0d 0c 12 04 0d 0c 1c 0f | 20 f2 67 63 6f 6c 28 33 |........| .gcol(3|
|00001af0| 2c 33 29 0d 0c 26 2b 20 | e7 28 48 25 3c 3e 6c 68 |,3)..&+ |.(H%<>lh|
|00001b00| 25 29 84 28 28 48 25 3d | 6c 68 25 29 80 28 6c 6d |%).((H%=|lh%).(lm|
|00001b10| 25 81 31 32 3c 3e 4d 25 | 81 31 32 29 29 8c 0d 0c |%.12<>M%|.12))...|
|00001b20| 30 28 20 20 f2 68 61 6e | 64 28 48 25 2a 35 2b 4d |0( .han|d(H%*5+M|
|00001b30| 25 81 31 32 2c 58 25 2c | 59 25 2c 52 25 2d 28 52 |%.12,X%,|Y%,R%-(R|
|00001b40| 25 3e 3e 31 29 29 0d 0c | 3a 06 20 cd 0d 0c 44 28 |%>>1))..|:. ...D(|
|00001b50| 20 e7 4d 25 3c 3e 6c 6d | 25 3a f2 68 61 6e 64 28 | .M%<>lm|%:.hand(|
|00001b60| 4d 25 2c 58 25 2c 59 25 | 2c 52 25 2d 28 52 25 3e |M%,X%,Y%|,R%-(R%>|
|00001b70| 3e 32 29 29 0d 0c 4e 10 | 20 f2 67 63 6f 6c 28 33 |>2))..N.| .gcol(3|
|00001b80| 2c 31 31 29 0d 0c 58 0f | 20 e7 53 25 3c 3e 6c 73 |,11)..X.| .S%<>ls|
|00001b90| 25 20 8c 0d 0c 62 0c 20 | 20 ec 58 25 2c 59 25 0d |% ...b. | .X%,Y%.|
|00001ba0| 0c 6c 2e 20 20 ec 42 59 | 28 52 25 3e 3e 34 29 2a |.l. .BY|(R%>>4)*|
|00001bb0| 73 69 6e 28 53 25 83 36 | 30 29 2c 28 52 25 3e 3e |sin(S%.6|0),(R%>>|
|00001bc0| 34 29 2a 63 6f 73 28 53 | 25 83 36 30 29 0d 0c 76 |4)*cos(S|%.60)..v|
|00001bd0| 38 20 20 df 42 59 28 52 | 25 2d 28 52 25 3e 3e 34 |8 .BY(R|%-(R%>>4|
|00001be0| 29 29 2a 73 69 6e 28 53 | 25 83 36 30 29 2c 28 52 |))*sin(S|%.60),(R|
|00001bf0| 25 2d 28 52 25 3e 3e 34 | 29 29 2a 63 6f 73 28 53 |%-(R%>>4|))*cos(S|
|00001c00| 25 83 36 30 29 0d 0c 80 | 06 20 cd 0d 0c 8a 20 20 |%.60)...|. .... |
|00001c10| f2 67 63 6f 6c 28 30 2c | 31 31 29 3a c8 8f c8 90 |.gcol(0,|11):....|
|00001c20| 58 25 2c 59 25 2c 52 25 | 3e 3e 34 0d 0c 94 05 cd |X%,Y%,R%|>>4.....|
|00001c30| 0d 0c 9e 05 cc 0d 0c a8 | 29 f2 5f 54 69 6d 65 28 |........|)._Time(|
|00001c40| 58 25 2d 78 72 25 2c 59 | 25 2d 79 72 25 2c 78 72 |X%-xr%,Y|%-yr%,xr|
|00001c50| 25 2f 34 2a 34 2f 35 2c | 79 72 25 2a 32 29 0d 0c |%/4*4/5,|yr%*2)..|
|00001c60| b2 05 cd 0d 0c bc 05 e1 | 0d 0c c6 04 0d 0c d0 12 |........|........|
|00001c70| dd f2 5f 52 65 6d 6f 76 | 65 63 6c 6f 63 6b 0d 0c |.._Remov|eclock..|
|00001c80| da 22 e7 20 41 6e 61 25 | 20 f2 67 63 6f 6c 28 30 |.". Ana%| .gcol(0|
|00001c90| 2c 30 29 20 8b 20 f2 67 | 63 6f 6c 28 30 2c 37 29 |,0) . .g|col(0,7)|
|00001ca0| 0d 0c e4 16 c8 93 c8 90 | 20 30 2c 30 2c 32 35 36 |........| 0,0,256|
|00001cb0| 30 2c 31 30 32 34 0d 0c | ee 05 e1 0d 0c f8 04 0d |0,1024..|........|
|00001cc0| 0d 02 04 0d 0d 0c 11 dd | f2 72 65 64 72 61 77 63 |........|.redrawc|
|00001cd0| 6c 6f 63 6b 0d 0d 16 28 | f2 63 6c 6f 63 6b 28 6c |lock...(|.clock(l|
|00001ce0| 68 25 2c 6c 6d 25 2c 6c | 73 25 2c 72 25 2c 78 25 |h%,lm%,l|s%,r%,x%|
|00001cf0| 2b 62 78 25 2c 79 25 2b | 62 79 25 29 0d 0d 20 05 |+bx%,y%+|by%).. .|
|00001d00| e1 0d 0d 2a 04 0d 0d 34 | 11 dd f2 67 63 6f 6c 28 |...*...4|...gcol(|
|00001d10| 4d 25 2c 43 25 29 0d 0d | 3e 0d ea 20 74 31 25 2c |M%,C%)..|>.. t1%,|
|00001d20| 63 31 25 0d 0d 48 0c e7 | 20 4d 25 3d 33 20 8c 0d |c1%..H..| M%=3 ..|
|00001d30| 0d 52 0e 20 e7 62 70 70 | 25 3d 33 20 8c 0d 0d 5c |.R. .bpp|%=3 ...\|
|00001d40| 1c 20 20 63 31 25 3d 70 | 61 6c 65 74 74 65 25 3f |. c1%=p|alette%?|
|00001d50| 28 43 25 2a 34 29 3e 3e | 32 0d 0d 66 1d 20 20 74 |(C%*4)>>|2..f. t|
|00001d60| 31 25 3d 70 61 6c 65 74 | 74 65 25 3f 28 43 25 2a |1%=palet|te%?(C%*|
|00001d70| 34 29 20 80 20 33 0d 0d | 70 20 20 20 e6 20 33 2c |4) . 3..|p . 3,|
|00001d80| 63 31 25 20 82 20 63 30 | 25 20 c8 9c 20 74 31 25 |c1% . c0|% .. t1%|
|00001d90| 20 82 20 74 30 25 0d 0d | 7a 06 20 cc 0d 0d 84 2d | . t0%..|z. ....-|
|00001da0| 20 20 c8 99 20 22 57 69 | 6d 70 5f 53 65 74 43 6f | .. "Wi|mp_SetCo|
|00001db0| 6c 6f 75 72 22 2c 28 43 | 25 80 31 35 29 84 28 28 |lour",(C|%.15).((|
|00001dc0| 4d 25 80 37 29 3c 3c 34 | 29 0d 0d 8e 06 20 cd 0d |M%.7)<<4|).... ..|
|00001dd0| 0d 98 05 cc 0d 0d a2 2c | 20 c8 99 20 22 57 69 6d |.......,| .. "Wim|
|00001de0| 70 5f 53 65 74 43 6f 6c | 6f 75 72 22 2c 28 43 25 |p_SetCol|our",(C%|
|00001df0| 80 31 35 29 84 28 28 4d | 25 80 37 29 3c 3c 34 29 |.15).((M|%.7)<<4)|
|00001e00| 0d 0d ac 05 cd 0d 0d b6 | 05 e1 0d 0d c0 04 0d 0d |........|........|
|00001e10| ca 0e dd f2 72 65 61 64 | 74 69 6d 65 0d 0d d4 20 |....read|time... |
|00001e20| 3f 74 62 6c 25 3d 33 3a | c8 99 20 22 4f 53 5f 57 |?tbl%=3:|.. "OS_W|
|00001e30| 6f 72 64 22 2c 31 34 2c | 74 62 6c 25 0d 0d de 40 |ord",14,|tbl%...@|
|00001e40| c8 99 22 4f 53 5f 43 6f | 6e 76 65 72 74 44 61 74 |.."OS_Co|nvertDat|
|00001e50| 65 41 6e 64 54 69 6d 65 | 22 2c 74 62 6c 25 2c 62 |eAndTime|",tbl%,b|
|00001e60| 75 66 66 65 72 73 25 2c | 35 31 32 2c 22 25 31 32 |uffers%,|512,"%12|
|00001e70| 20 25 4d 49 20 25 53 45 | 22 2b bd 30 0d 0d e8 15 | %MI %SE|"+.0....|
|00001e80| 68 25 3d bb c0 24 62 75 | 66 66 65 72 73 25 2c 32 |h%=..$bu|ffers%,2|
|00001e90| 29 0d 0d f2 17 6d 25 3d | bb c1 24 62 75 66 66 65 |)....m%=|..$buffe|
|00001ea0| 72 73 25 2c 34 2c 32 29 | 0d 0d fc 17 73 25 3d bb |rs%,4,2)|....s%=.|
|00001eb0| c1 24 62 75 66 66 65 72 | 73 25 2c 37 2c 32 29 0d |.$buffer|s%,7,2).|
|00001ec0| 0e 06 05 e1 0d 0e 10 04 | 0d 0e 1a 0d dd f2 63 61 |........|......ca|
|00001ed0| 6c 63 72 78 79 0d 0e 24 | 11 f2 67 65 74 77 28 63 |lcrxy..$|..getw(c|
|00001ee0| 6c 6f 63 6b 25 29 0d 0e | 2e 25 72 25 3d 78 31 25 |lock%)..|.%r%=x1%|
|00001ef0| 2d 78 30 25 3a e7 72 25 | 3e 79 31 25 2d 79 30 25 |-x0%:.r%|>y1%-y0%|
|00001f00| 3a 72 25 3d 79 31 25 2d | 79 30 25 0d 0e 38 18 72 |:r%=y1%-|y0%..8.r|
|00001f10| 25 3d 72 25 3e 3e 31 3a | 72 25 2d 3d 28 72 25 3e |%=r%>>1:|r%-=(r%>|
|00001f20| 3e 34 29 0d 0e 42 22 78 | 72 25 3d 28 78 31 25 2d |>4)..B"x|r%=(x1%-|
|00001f30| 78 30 25 29 3e 3e 31 3a | 78 72 25 2d 3d 28 78 72 |x0%)>>1:|xr%-=(xr|
|00001f40| 25 3e 3e 34 29 0d 0e 4c | 22 79 72 25 3d 28 79 31 |%>>4)..L|"yr%=(y1|
|00001f50| 25 2d 79 30 25 29 3e 3e | 31 3a 79 72 25 2d 3d 28 |%-y0%)>>|1:yr%-=(|
|00001f60| 79 72 25 3e 3e 32 29 0d | 0e 56 22 78 25 3d 28 78 |yr%>>2).|.V"x%=(x|
|00001f70| 31 25 2d 78 30 25 29 81 | 32 3a 79 25 3d 2d 28 79 |1%-x0%).|2:y%=-(y|
|00001f80| 31 25 2d 79 30 25 29 81 | 32 0d 0e 60 05 e1 0d 0e |1%-y0%).|2..`....|
|00001f90| 6a 04 0d 0e 74 05 3a 0d | 0e 7e 09 dd f2 64 69 65 |j...t.:.|.~...die|
|00001fa0| 0d 0e 88 0f 21 62 75 66 | 66 65 72 73 25 3d 30 0d |....!buf|fers%=0.|
|00001fb0| 0e 92 51 24 28 62 75 66 | 66 65 72 73 25 2b 34 29 |..Q$(buf|fers%+4)|
|00001fc0| 3d 22 43 6c 6f 63 6b 20 | 68 61 73 20 73 75 66 66 |="Clock |has suff|
|00001fd0| 65 72 65 64 20 61 20 66 | 61 74 61 6c 20 65 72 72 |ered a f|atal err|
|00001fe0| 6f 72 20 61 6e 64 20 6d | 75 73 74 20 65 78 69 74 |or and m|ust exit|
|00001ff0| 20 69 6d 6d 65 64 69 61 | 74 65 6c 79 22 2b bd 30 | immedia|tely"+.0|
|00002000| 0d 0e 9c 2c c8 99 20 22 | 57 69 6d 70 5f 52 65 70 |...,.. "|Wimp_Rep|
|00002010| 6f 72 74 45 72 72 6f 72 | 22 2c 62 75 66 66 65 72 |ortError|",buffer|
|00002020| 73 25 2c 31 2c 22 43 6c | 6f 63 6b 22 0d 0e a6 0b |s%,1,"Cl|ock"....|
|00002030| f2 66 69 6e 69 73 68 0d | 0e b0 05 e0 0d 0e ba 05 |.finish.|........|
|00002040| e1 0d 0e c4 04 0d 0e ce | 1a dd f2 5f 54 69 6d 65 |........|..._Time|
|00002050| 28 58 25 2c 59 25 2c 44 | 58 25 2c 44 59 25 29 0d |(X%,Y%,D|X%,DY%).|
|00002060| 0e d8 18 ea 20 57 25 2c | 64 25 2c 4c 43 25 2c 43 |.... W%,|d%,LC%,C|
|00002070| 25 2c 61 6d 70 6d 25 0d | 0e e2 0d 57 25 3d 44 59 |%,ampm%.|...W%=DY|
|00002080| 25 2f 31 30 0d 0e ec 17 | e7 20 44 58 25 2f 35 3c |%/10....|. DX%/5<|
|00002090| 57 25 20 57 25 3d 44 58 | 25 2f 35 0d 0e f6 10 54 |W% W%=DX|%/5....T|
|000020a0| 69 6d 65 24 3d c2 91 24 | 2c 38 29 0d 0f 00 1f e7 |ime$=..$|,8).....|
|000020b0| 20 28 44 58 25 3e 36 34 | 30 2f 38 29 20 80 20 28 | (DX%>64|0/8) . (|
|000020c0| 44 59 25 3e 32 35 36 29 | 20 8c 0d 0f 0a 26 f2 67 |DY%>256)| ....&.g|
|000020d0| 63 6f 6c 28 30 2c 33 29 | 3a ec 20 58 25 2c 59 25 |col(0,3)|:. X%,Y%|
|000020e0| 2b 44 59 25 2b 33 32 3a | f1 c0 91 24 2c 31 35 29 |+DY%+32:|...$,15)|
|000020f0| 0d 0f 14 05 cd 0d 0f 1e | 0f e7 20 ac 20 68 72 32 |........|.. . hr2|
|00002100| 34 25 20 8c 0d 0f 28 14 | 20 20 61 6d 70 6d 25 3d |4% ...(.| ampm%=|
|00002110| bb 28 54 69 6d 65 24 29 | 0d 0f 32 12 20 20 e7 20 |.(Time$)|..2. . |
|00002120| 61 6d 70 6d 25 3e 31 32 | 20 8c 0d 0f 3c 15 20 20 |ampm%>12| ...<. |
|00002130| e7 20 61 6d 70 6d 25 2d | 31 32 3c 31 30 20 8c 0d |. ampm%-|12<10 ..|
|00002140| 0f 46 21 20 20 20 20 c0 | 54 69 6d 65 24 2c 32 29 |.F! .|Time$,2)|
|00002150| 3d 22 3b 22 2b c3 28 61 | 6d 70 6d 25 2d 31 32 29 |=";"+.(a|mpm%-12)|
|00002160| 0d 0f 47 07 20 20 cc 0d | 0f 48 1d 20 20 20 20 c0 |..G. ..|.H. .|
|00002170| 54 69 6d 65 24 2c 32 29 | 3d c3 28 61 6d 70 6d 25 |Time$,2)|=.(ampm%|
|00002180| 2d 31 32 29 0d 0f 50 07 | 20 20 cd 0d 0f 5a 07 20 |-12)..P.| ...Z. |
|00002190| 20 cd 0d 0f 64 18 20 20 | f2 67 63 6f 6c 28 30 2c | ...d. |.gcol(0,|
|000021a0| 33 29 3a ec 20 58 25 2c | 59 25 0d 0f 6e 1f 20 20 |3):. X%,|Y%..n. |
|000021b0| e7 20 61 6d 70 6d 25 3e | 3d 31 32 20 f1 22 70 6d |. ampm%>|=12 ."pm|
|000021c0| 22 20 8b 20 f1 22 61 6d | 22 0d 0f 78 05 cd 0d 0f |" . ."am|"..x....|
|000021d0| 82 1f e7 20 bb 28 54 69 | 6d 65 24 29 3c 31 30 20 |... .(Ti|me$)<10 |
|000021e0| c0 54 69 6d 65 24 2c 31 | 29 3d 22 3b 22 0d 0f 8c |.Time$,1|)=";"...|
|000021f0| 0f e3 20 64 25 20 3d 31 | 20 b8 20 38 0d 0f 96 34 |.. d% =1| . 8...4|
|00002200| 4c 43 25 3d 97 28 c1 4c | 61 73 74 54 69 6d 65 24 |LC%=.(.L|astTime$|
|00002210| 2c 64 25 2c 31 29 29 2d | 34 38 3a 43 25 3d 97 28 |,d%,1))-|48:C%=.(|
|00002220| c1 54 69 6d 65 24 2c 64 | 25 2c 31 29 29 2d 34 38 |.Time$,d|%,1))-48|
|00002230| 0d 0f a0 3b e7 20 4c 43 | 25 3c 3e 43 25 20 f2 5f |...;. LC|%<>C% ._|
|00002240| 44 69 67 69 74 28 4c 43 | 25 2c 43 25 2c 58 25 2b |Digit(LC|%,C%,X%+|
|00002250| 28 64 25 2d 31 29 2a 28 | 44 58 25 2b 57 25 29 2c |(d%-1)*(|DX%+W%),|
|00002260| 59 25 2c 44 58 25 2c 44 | 59 25 29 0d 0f aa 05 ed |Y%,DX%,D|Y%).....|
|00002270| 0d 0f b4 13 4c 61 73 74 | 54 69 6d 65 24 3d 54 69 |....Last|Time$=Ti|
|00002280| 6d 65 24 0d 0f be 05 e1 | 0d 0f c8 04 0d 0f d2 22 |me$.....|......."|
|00002290| dd f2 5f 44 69 67 69 74 | 28 4c 44 25 2c 44 25 2c |.._Digit|(LD%,D%,|
|000022a0| 58 25 2c 59 25 2c 44 58 | 25 2c 44 59 25 29 0d 0f |X%,Y%,DX|%,DY%)..|
|000022b0| dc 12 ea 20 58 2c 4f 6e | 44 25 2c 4f 6e 4c 44 25 |... X,On|D%,OnLD%|
|000022c0| 0d 0f e6 0d e3 20 58 3d | 30 20 b8 20 37 0d 0f f0 |..... X=|0 . 7...|
|000022d0| 22 4f 6e 44 25 3d 28 44 | 69 67 43 6f 64 65 25 28 |"OnD%=(D|igCode%(|
|000022e0| 44 25 29 20 80 20 28 32 | 5e 58 29 29 3c 3e 30 0d |D%) . (2|^X))<>0.|
|000022f0| 0f fa 24 4f 6e 4c 44 25 | 3d 28 44 69 67 43 6f 64 |..$OnLD%|=(DigCod|
|00002300| 65 25 28 4c 44 25 29 20 | 80 20 28 32 5e 58 29 29 |e%(LD%) |. (2^X))|
|00002310| 3c 3e 30 0d 10 04 2e e7 | 20 4f 6e 44 25 3c 3e 4f |<>0.....| OnD%<>O|
|00002320| 6e 4c 44 25 20 f2 5f 53 | 65 63 74 28 58 2c 4f 6e |nLD% ._S|ect(X,On|
|00002330| 44 25 2c 58 25 2c 59 25 | 2c 44 58 25 2c 44 59 25 |D%,X%,Y%|,DX%,DY%|
|00002340| 29 0d 10 0e 05 ed 0d 10 | 18 05 e1 0d 10 22 04 0d |).......|....."..|
|00002350| 10 2c 26 dd f2 5f 53 65 | 63 74 28 53 65 63 74 25 |.,&.._Se|ct(Sect%|
|00002360| 2c 46 6c 61 67 25 2c 58 | 25 2c 59 25 2c 44 58 25 |,Flag%,X|%,Y%,DX%|
|00002370| 2c 44 59 25 29 0d 10 36 | 0e c8 8e 20 53 65 63 74 |,DY%)..6|... Sect|
|00002380| 25 20 ca 0d 10 40 51 c9 | 20 30 3a f2 5f 51 75 61 |% ...@Q.| 0:._Qua|
|00002390| 64 28 46 6c 61 67 25 2c | 58 25 2c 59 25 2b 44 59 |d(Flag%,|X%,Y%+DY|
|000023a0| 25 2c 58 25 2b 44 58 25 | 2c 59 25 2b 44 59 25 2c |%,X%+DX%|,Y%+DY%,|
|000023b0| 58 25 2b 44 58 25 2d 57 | 25 2c 59 25 2b 44 59 25 |X%+DX%-W|%,Y%+DY%|
|000023c0| 2d 57 25 2c 58 25 2b 57 | 25 2c 59 25 2b 44 59 25 |-W%,X%+W|%,Y%+DY%|
|000023d0| 2d 57 25 29 0d 10 4a 4d | c9 20 31 3a f2 5f 51 75 |-W%)..JM|. 1:._Qu|
|000023e0| 61 64 28 46 6c 61 67 25 | 2c 58 25 2c 59 25 2b 44 |ad(Flag%|,X%,Y%+D|
|000023f0| 59 25 2f 32 2c 58 25 2c | 59 25 2b 44 59 25 2c 58 |Y%/2,X%,|Y%+DY%,X|
|00002400| 25 2b 57 25 2c 59 25 2b | 44 59 25 2d 57 25 2c 58 |%+W%,Y%+|DY%-W%,X|
|00002410| 25 2b 57 25 2c 59 25 2b | 44 59 25 2f 32 2b 57 25 |%+W%,Y%+|DY%/2+W%|
|00002420| 29 0d 10 54 5d c9 20 32 | 3a f2 5f 51 75 61 64 28 |)..T]. 2|:._Quad(|
|00002430| 46 6c 61 67 25 2c 58 25 | 2b 44 58 25 2c 59 25 2b |Flag%,X%|+DX%,Y%+|
|00002440| 44 59 25 2f 32 2c 58 25 | 2b 44 58 25 2c 59 25 2b |DY%/2,X%|+DX%,Y%+|
|00002450| 44 59 25 2c 58 25 2b 44 | 58 25 2d 57 25 2c 59 25 |DY%,X%+D|X%-W%,Y%|
|00002460| 2b 44 59 25 2d 57 25 2c | 58 25 2b 44 58 25 2d 57 |+DY%-W%,|X%+DX%-W|
|00002470| 25 2c 59 25 2b 44 59 25 | 2f 32 2b 57 25 29 0d 10 |%,Y%+DY%|/2+W%)..|
|00002480| 5e 61 c9 20 33 3a f2 5f | 51 75 61 64 28 46 6c 61 |^a. 3:._|Quad(Fla|
|00002490| 67 25 2c 58 25 2c 59 25 | 2b 44 59 25 2f 32 2b 32 |g%,X%,Y%|+DY%/2+2|
|000024a0| 2c 58 25 2b 44 58 25 2c | 59 25 2b 44 59 25 2f 32 |,X%+DX%,|Y%+DY%/2|
|000024b0| 2b 32 2c 58 25 2b 44 58 | 25 2d 57 25 2c 59 25 2b |+2,X%+DX|%-W%,Y%+|
|000024c0| 44 59 25 2f 32 2d 57 25 | 2b 32 2c 58 25 2b 57 25 |DY%/2-W%|+2,X%+W%|
|000024d0| 2c 59 25 2b 44 59 25 2f | 32 2d 57 25 2b 32 29 0d |,Y%+DY%/|2-W%+2).|
|000024e0| 10 68 5d f2 5f 51 75 61 | 64 28 46 6c 61 67 25 2c |.h]._Qua|d(Flag%,|
|000024f0| 58 25 2c 59 25 2b 44 59 | 25 2f 32 2d 32 2c 58 25 |X%,Y%+DY|%/2-2,X%|
|00002500| 2b 44 58 25 2c 59 25 2b | 44 59 25 2f 32 2d 32 2c |+DX%,Y%+|DY%/2-2,|
|00002510| 58 25 2b 44 58 25 2d 57 | 25 2c 59 25 2b 44 59 25 |X%+DX%-W|%,Y%+DY%|
|00002520| 2f 32 2b 57 25 2d 32 2c | 58 25 2b 57 25 2c 59 25 |/2+W%-2,|X%+W%,Y%|
|00002530| 2b 44 59 25 2f 32 2b 57 | 25 2d 32 29 0d 10 72 45 |+DY%/2+W|%-2)..rE|
|00002540| c9 20 34 3a f2 5f 51 75 | 61 64 28 46 6c 61 67 25 |. 4:._Qu|ad(Flag%|
|00002550| 2c 58 25 2c 59 25 2c 58 | 25 2c 59 25 2b 44 59 25 |,X%,Y%,X|%,Y%+DY%|
|00002560| 2f 32 2c 58 25 2b 57 25 | 2c 59 25 2b 44 59 25 2f |/2,X%+W%|,Y%+DY%/|
|00002570| 32 2d 57 25 2c 58 25 2b | 57 25 2c 59 25 2b 57 25 |2-W%,X%+|W%,Y%+W%|
|00002580| 29 0d 10 7c 55 c9 20 35 | 3a f2 5f 51 75 61 64 28 |)..|U. 5|:._Quad(|
|00002590| 46 6c 61 67 25 2c 58 25 | 2b 44 58 25 2c 59 25 2c |Flag%,X%|+DX%,Y%,|
|000025a0| 58 25 2b 44 58 25 2c 59 | 25 2b 44 59 25 2f 32 2c |X%+DX%,Y|%+DY%/2,|
|000025b0| 58 25 2b 44 58 25 2d 57 | 25 2c 59 25 2b 44 59 25 |X%+DX%-W|%,Y%+DY%|
|000025c0| 2f 32 2d 57 25 2c 58 25 | 2b 44 58 25 2d 57 25 2c |/2-W%,X%|+DX%-W%,|
|000025d0| 59 25 2b 57 25 29 0d 10 | 86 41 c9 20 36 3a f2 5f |Y%+W%)..|.A. 6:._|
|000025e0| 51 75 61 64 28 46 6c 61 | 67 25 2c 58 25 2c 59 25 |Quad(Fla|g%,X%,Y%|
|000025f0| 2c 58 25 2b 44 58 25 2c | 59 25 2c 58 25 2b 44 58 |,X%+DX%,|Y%,X%+DX|
|00002600| 25 2d 57 25 2c 59 25 2b | 57 25 2c 58 25 2b 57 25 |%-W%,Y%+|W%,X%+W%|
|00002610| 2c 59 25 2b 57 25 29 0d | 10 90 7d c9 20 37 3a f2 |,Y%+W%).|..}. 7:.|
|00002620| 5f 51 75 61 64 28 46 6c | 61 67 25 2c 58 25 2b 44 |_Quad(Fl|ag%,X%+D|
|00002630| 58 25 2f 32 2d 57 25 2c | 59 25 2b 44 59 25 2a 33 |X%/2-W%,|Y%+DY%*3|
|00002640| 2f 34 2d 57 25 2c 58 25 | 2b 44 58 25 2f 32 2d 57 |/4-W%,X%|+DX%/2-W|
|00002650| 25 2c 59 25 2b 44 59 25 | 2a 33 2f 34 2b 57 25 2c |%,Y%+DY%|*3/4+W%,|
|00002660| 58 25 2b 44 58 25 2f 32 | 2b 57 25 2c 59 25 2b 44 |X%+DX%/2|+W%,Y%+D|
|00002670| 59 25 2a 33 2f 34 2b 57 | 25 2c 58 25 2b 44 58 25 |Y%*3/4+W|%,X%+DX%|
|00002680| 2f 32 2b 57 25 2c 59 25 | 2b 44 59 25 2a 33 2f 34 |/2+W%,Y%|+DY%*3/4|
|00002690| 2d 57 25 29 0d 10 9a 79 | f2 5f 51 75 61 64 28 46 |-W%)...y|._Quad(F|
|000026a0| 6c 61 67 25 2c 58 25 2b | 44 58 25 2f 32 2d 57 25 |lag%,X%+|DX%/2-W%|
|000026b0| 2c 59 25 2b 44 59 25 2a | 31 2f 34 2d 57 25 2c 58 |,Y%+DY%*|1/4-W%,X|
|000026c0| 25 2b 44 58 25 2f 32 2d | 57 25 2c 59 25 2b 44 59 |%+DX%/2-|W%,Y%+DY|
|000026d0| 25 2a 31 2f 34 2b 57 25 | 2c 58 25 2b 44 58 25 2f |%*1/4+W%|,X%+DX%/|
|000026e0| 32 2b 57 25 2c 59 25 2b | 44 59 25 2a 31 2f 34 2b |2+W%,Y%+|DY%*1/4+|
|000026f0| 57 25 2c 58 25 2b 44 58 | 25 2f 32 2b 57 25 2c 59 |W%,X%+DX|%/2+W%,Y|
|00002700| 25 2b 44 59 25 2a 31 2f | 34 2d 57 25 29 0d 10 a4 |%+DY%*1/|4-W%)...|
|00002710| 05 cb 0d 10 ae 05 e1 0d | 10 b8 04 0d 10 c2 04 0d |........|........|
|00002720| 10 cc 04 0d 10 d6 04 0d | 10 e0 32 dd f2 5f 51 75 |........|..2.._Qu|
|00002730| 61 64 28 46 6c 61 67 25 | 2c 58 31 25 2c 59 31 25 |ad(Flag%|,X1%,Y1%|
|00002740| 2c 58 32 25 2c 59 32 25 | 2c 58 33 25 2c 59 33 25 |,X2%,Y2%|,X3%,Y3%|
|00002750| 2c 58 34 25 2c 59 34 25 | 29 0d 10 ea 17 ea 20 43 |,X4%,Y4%|)..... C|
|00002760| 2c 44 58 31 2c 44 58 32 | 2c 44 59 31 2c 44 59 32 |,DX1,DX2|,DY1,DY2|
|00002770| 0d 10 f4 0d e7 20 46 6c | 61 67 25 20 8c 0d 10 fe |..... Fl|ag% ....|
|00002780| 15 44 58 31 3d 28 58 33 | 25 2d 58 31 25 29 2f 38 |.DX1=(X3|%-X1%)/8|
|00002790| 2f 32 0d 11 08 15 44 58 | 32 3d 28 58 34 25 2d 58 |/2....DX|2=(X4%-X|
|000027a0| 32 25 29 2f 38 2f 32 0d | 11 12 15 44 59 31 3d 28 |2%)/8/2.|...DY1=(|
|000027b0| 59 33 25 2d 59 31 25 29 | 2f 38 2f 32 0d 11 1c 15 |Y3%-Y1%)|/8/2....|
|000027c0| 44 59 32 3d 28 59 34 25 | 2d 59 32 25 29 2f 38 2f |DY2=(Y4%|-Y2%)/8/|
|000027d0| 32 0d 11 26 0e e3 20 43 | 25 3d 30 20 b8 20 37 0d |2..&.. C|%=0 . 7.|
|000027e0| 11 30 25 e7 20 72 76 25 | 20 f2 67 63 6f 6c 28 30 |.0%. rv%| .gcol(0|
|000027f0| 2c 43 25 29 20 8b 20 f2 | 67 63 6f 6c 28 30 2c 37 |,C%) . .|gcol(0,7|
|00002800| 2d 43 25 29 0d 11 3a 1b | ec 20 58 31 25 2b 44 58 |-C%)..:.|. X1%+DX|
|00002810| 31 2a 43 25 2c 59 31 25 | 2b 44 59 31 2a 43 25 0d |1*C%,Y1%|+DY1*C%.|
|00002820| 11 44 1b ec 20 58 32 25 | 2b 44 58 32 2a 43 25 2c |.D.. X2%|+DX2*C%,|
|00002830| 59 32 25 2b 44 59 32 2a | 43 25 0d 11 4e 1d f0 38 |Y2%+DY2*|C%..N..8|
|00002840| 35 2c 58 34 25 2d 44 58 | 32 2a 43 25 2c 59 34 25 |5,X4%-DX|2*C%,Y4%|
|00002850| 2d 44 59 32 2a 43 25 0d | 11 58 1d f0 38 35 2c 58 |-DY2*C%.|.X..85,X|
|00002860| 33 25 2d 44 58 31 2a 43 | 25 2c 59 33 25 2d 44 59 |3%-DX1*C|%,Y3%-DY|
|00002870| 31 2a 43 25 0d 11 62 05 | ed 0d 11 6c 05 cc 0d 11 |1*C%..b.|...l....|
|00002880| 76 0e f2 67 63 6f 6c 28 | 30 2c 37 29 0d 11 80 0d |v..gcol(|0,7)....|
|00002890| ec 20 58 31 25 2c 59 31 | 25 0d 11 8a 0d ec 20 58 |. X1%,Y1|%..... X|
|000028a0| 32 25 2c 59 32 25 0d 11 | 94 0f f0 38 35 2c 58 34 |2%,Y2%..|...85,X4|
|000028b0| 25 2c 59 34 25 0d 11 9e | 0f f0 38 35 2c 58 33 25 |%,Y4%...|..85,X3%|
|000028c0| 2c 59 33 25 0d 11 a8 05 | cd 0d 11 b2 05 e1 0d 11 |,Y3%....|........|
|000028d0| bc 04 0d 11 c6 04 0d ff | |........| |
+--------+-------------------------+-------------------------+--------+--------+